##############################################################################
###+-------------+############################################################
#+-| SAVE_SCREEN |-------------------------------+############################
#| +-------------+ Saves the entire screen image |############################
#+-----------------------------------------------+############################
##############################################################################
##############################################################################
#+--| Summary |------------+##################################################
#|     #INCLUDE io.hdr     |##################################################
#+-------------------------+##################################################
##############################################################################
##############################################################################
#+--| Syntax |-----------------------------+##################################
#|     PROCEDURE save_screen PROTOTYPE     |##################################
#+-----------------------------------------+##################################
##############################################################################
##############################################################################
############+---| Description |---------------------------------+#############
############| The save_screen procedure saves the entire screen |#############
############| image.  To restore the screen image, use the      |#############
############| restore_area procedure.                           |#############
############+---------------------------------------------------+#############
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Save the screen before calling a subapplication.    |#########
#########|                                                          |#########
#########| DO save_screen                                           |#########
#########| RUN  "ship.exe"                                          |#########
#########| DO restore_area                                          |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    Save the screen when starting your application so   |#########
#########| *    it can be restored upon termination.                |#########
#########|                                                          |#########
#########| PROCEDURE force_main                                     |#########
#########|                                                          |#########
#########|     DO save_screen                                       |#########
#########|     {...}                                                |#########
#########|     DO restore_area                                      |#########
#########|                                                          |#########
#########| ENDPRO                                                   |#########
#########+----------------------------------------------------------+#########
##############################################################################